5 MM=MM+1:IFMM=1THENGOSUB60100 105 GOTO1910 110 PRINT"[145] [151]PRESS SPACE TO CONTINUE 120 [139][194](203)[179][177]60[167]120 130 [153]"LOAD";:[151]56334,[194](56334)[176]1:[151]53272,([194](53272)[175]240)[170]12:[156]:[134]W(99,2):LV[178]0:MM[178]2:W(4,1)[178]33:W(4,2)[178]5:[129]B[178]6[164]13:W(B,1)[178]21:W(B,2)[178]55:[130]:W(82,1)[178]129:W(82,2)[178]250:W(50,1)[178]129:W(50,2)[178]250:W(99,1)[178]21:W(99,2)[178]250 180 W(1,1)[178]17:W(1,2)[178]50:SL$[178]" ":W(3,1)[178]65:W(3,2)[178]15:W(5,1)[178]85:W(5,2)[178]30:W(26,1)[178]129:W(26,2)[178]25 200 X[178]2:Y[178]1:CL[178]13:CH[178]82 210 [151]53280,12:[151]53281,12:D[178].:X1[178].:X2[178].:X3[178].:OK[178].:[129]T[178]54272[164]54295:[151]T,0:[130]:[151]54296,15:[139]LV[177]5[167]LV[178]5 230 AD[178]1[172]16[170]0:SR[178]15[172]16[170]2:[151]54284,AD:[151]54285,SR:[151]54282,0:[151]54281,255:[137]1210 260 [153]"STOP";:[151]53281,12:[151]53280,12:D[178].:X1[178].:X2[178].:X3[178].:OK[178].:X[178]2:Y[178]1:CL[178]13:CH[178]82:N[178]N[170]1:ML[178]1:[147]F$,8,1 300 ML[178]2:[147]F$[170]"/C",8,1 310 ML[178]3:[145]N[137]1310,1390,1500,1560,1630,1710,1770,1820 320 [144]:[139]A$[178]"D"[167][153]""A$;:[137]420 340 [139][198](A$)[177]69[175][198](A$)[179]78[167][153]"POKE"A$;:[137]420 350 [139]A$[178]"P"[167][153]"STOP"A$;:[137]420 360 [139]A$[178]"Z"[167][153]""A$;:[137]420 370 [139]A$[178]"(null)"[167][153]"PRINT"A$;:[137]420 380 [139]A$[178]"TAB("[167][153]""A$;:[137]420 390 [139]A$[178]"(null)"[167][153]"CONT"A$;:[137]420 400 [153]"PRINT"A$;:[139]A$[178][199](32)[167]65535 410 [139]A$[178][199](13)[167]440 420 CI[178][198](A$)[171]64:[151]54283,W(CI,1):[151]54280,W(CI,2):[151]54283,[182](W(CI,1)[171]1):[137]65535 440 [130]:[160]2:[137]530 450 [160]2:[139]ST[178]64[167]530 460 [153]"STOP":[129]G[178]1[164]7:[153]SL$:[130]:[151]53265,[194](53265)[176]16:[153]" WE'RE SORRY...YOUR FILE MAY NOT BE":[153]"LOADED AS COMMANDED. PLEASE CHECK DISK":[153]"IN DRIVE AND PRESS FIRE TO TRY AGAIN...":[153]"OR CONSULT INSTRUCTION MANUAL.THANK YOU":[153]SL$:[153]"ON";[200](SL$,19); 510 [139][194](56320)[178]127[167][151]646,[182]([194](646)[171]1):[153]"OCMD";:[137]510 520 [153]"":[129]G[178]1[164]7:[153]SL$:[130]:[137]260 530 [139]X[178]2[167][153]"STOPO":[151]53265,[194](53265)[176]16:[137]550 540 [139]X[178]12[167][153]"O":[151]53265,[194](53265)[176]16 550 [129]T[178]54272[164]54295:[151]T,0:[130]:[151]54296,15:AD[178]1[172]16[170]0:SR[178]15[172]16[170]2:[151]54284,AD:[151]54285,SR:[151]54282,0:[151]54281,255 580 [139][194](56320)[179][177]127[167]J[178][194](56320):[137]620 590 Q[178][194](54272[170](1023[170]X[170](Y[172]40))):[151]54272[170](1023[170]X[170](Y[172]40)),[182]((Q)[171]1):[137]580 600 [139][194](56320)[178]127[175]D[179][177]2[167]600 610 J[178][194](56320) 620 [139]J[178]119[167]X1[178]1023[170]X[170]1:X2[178]Y[172]40:[139][194](X1[170]X2)[179]5[176][194](X1[170]X2)[178]82[167]730 630 [139]J[178]123[167]X1[178]1023[170]X[171]1:X2[178]Y[172]40:[139][194](X1[170]X2)[179]5[176][194](X1[170]X2)[178]82[167]730 640 [139]J[178]126[167]X1[178]1023[170]X:X2[178]Y[171]1:X3[178]X2[172]40:[139][194](X1[170]X3)[178]1[167]730 650 [139]J[178]125[167]X1[178]1023[170]X:X3[178](Y[170]1)[172]40:[139][194](X1[170]X3)[178]1[176][194](X1[170]X3)[178]32[167]730 660 [139]J[178]119[167]X1[178]1023[170]X[170]1:X2[178]Y[172]40:[139][194](X1[170]X2)[178]32[176][194](X1[170]X2)[178]99[167]730 670 [139]J[178]123[167]X1[178]1023[170]X[171]1:X2[178]Y[172]40:[139][194](X1[170]X2)[178]32[176][194](X1[170]X2)[178]99[167]730 680 [139]J[178]111[167][142] 690 [139]D[179][177]2[167]600 700 [139]D[178]2[175]SM[178].[167]J[178]126:[137]730 710 [139]SM[178]1[167]1140 720 [137]600 730 [139]D[178]2[175]J[179][177]126[167]D[178].:SM[178]. 740 X1[178]1023[170]X:X2[178]Y[172]40:X3[178]X1[170]X2:[151]X3,CH:[151]54272[170]X3,CL:[139]J[178]119[167]X[178]X[170]1 760 [139]J[178]123[167]X[178]X[171]1 770 [139]J[178]126[167]Y[178]Y[171]1 780 [139]J[178]125[167]Y[178]Y[170]1 790 X3[178]1023[170]X[170]Y[172]40:CH[178][194](X3):CL[178][194](54272[170]X3):[151]54283,.:[151]54280,.:[151]54283,W(CH,1):[151]54280,W(CH,2):[151]54283,[182](W(CH,1)[171]1):OK[178][194](X3):[139]CH[178]3[167]CH[178]5:CL[178]9 840 [151]X3,15:[151]X3[170]54272,0:[139]OK[179][177]32[175]D[179][177]1[167]600 850 [139]OK[178]2[176]D[178]2[167]D[178]2:[137]1110 860 [139]OK[178]32[167]D[178]1:J[178]125:[151]54283,21:[151]54280,Y[172]9:[151]54283,20:[137]730 870 [139]CH[178]99[167]D[178]0:[137]600 880 X1[178]1023[170]X:X2[178]Y[172]40:[141]1150:[129]T[178]65[164]73:[151]X1[170]X2,T:[129]H[178]1[164]80:[130]:[130]:[151]54283,0:[139]OK[178]3[167]940 910 [139]OK[178]19[167]940 920 X1[178]1023[170]X:X2[178]Y[172]40:X3[178]X1[170]X2:[151]X3,CH:[151]54272[170]X3,CL:[137]1160 940 [145]JP[170]1[137]960,990,1030,1070,950 950 [128] 960 [139]OK[179][177]19[167]1160 970 [139]JP[178]0[167]JP[178]1:[153]"LOADYOU^MAY^ADVANCE^TO^THE^NEXT^LEVELWAIT! 980 F$="MAZE 2":LV=LV+1:FORG=1TO2500:NEXT:GOTO200 990 X3=1023+X+(Y+1)*40:Z=PEEK(X3):IFZ=32THENOK=32:CH=5:CL=9:GOTO860 1000 IFOK<>19THEN1160 1010 PRINT"[147]NEXT^LEVEL":JP=2:FORG=1TO2500:NEXT:F$="MAZE 3":LV=LV+1:GOTO200 1030 X3=1023+X+(Y+1)*40:Z=PEEK(X3):IFZ=32THENOK=32:CH=5:CL=9:GOTO860 1040 IFOK<>19THEN1160 1050 PRINT"[147]NEXT^LEVEL":JP=3:FORG=1TO2500:NEXT:F$="MAZE 4":X=12:Y=20:CH=1:CL=0:LV=LV+1:GOTO210 1070 X3=1023+X+(Y+1)*40:Z=PEEK(X3):IFZ=32THENOK=32:CH=5:CL=9:GOTO860 1080 IFOK<>19THEN1160 1090 PRINT"[147]THAT'S^IT![146]":END:LV=LV+1:JP=4:F$="MAZE 5":GOTO200 1110 IFPEEK(X3-40)=32THENJ=126:POKE54283,21:POKE54280,Y*9:POKE54283,20:GOTO600 1120 IFPEEK(X3-40)=99THEND=.:J=126:GOTO730 1130 J=PEEK(56320):IFJ=119ORJ=123THENSM=1:GOTO620 1140 J=111:GOTO680 1150 POKE54283,129:POKE54280,5:RETURN 1160 POKE646,ABS(PEEK(646)-1):PRINT" YOU":PRINT"DIED":X=2:Y=1:CL=13:CH=82:X1=.:X2=.:X3=.:OK=.:D=.:GOTO530 1190 PRINT"[147]YOU WERE LUCKY THIS TIME[146]!":F$="MAZE 1":LV=LV-1 1210 PRINT"[147][153] WELCOME TO THE ALL SMILES TUTORIAL [146]O":PRINT:PRINT" I WILL GUIDE YOU THROUGH A SERIES OF":PRINT:PRINT"MINI-MAZES THAT ARE SIMILAR TO ONES YOU":PRINT:PRINT" WILL BE TRAVELING THROUGH IN THE REAL":PRINT:PRINT"GAME WHERE YOUR LIFE DEPENDS ON KNOWING 1260 [153]:[153]" HOW TO PLAY. YOU ARE THE WAITO. YOU MOVE":[153]:[153]" WITH THE JOYSTICK IN PORT 2.":[153]:[153]" SYSPRESS THE FIRE BUTTON TO BE TUTORED.":[153]:[153]" PRESS SPACE BAR TO PLAY ALL SMILES.":[153]:[153]" PRESS Q TO QUIT.":[151]198,. 1284 [161]T$:[139]T$[178]" "[167]1860 1285 [139]T$[178]"Q"[167]60000 1290 [139][194](56320)[178]127[167]1284 1300 F$[178]"TUT 1":[141]260 1310 [153]"";:[153]"STOP YOU MAY WALK ON THE GREEN FLOOR.":[153]" YOU MAY NOT PASS THROUGH A BRICK WALL":[153]" TRY WALKING LEFT AND RIGHT":[153]" TRY WALKING THROUGH A WALL":[153]" NOTICE THE SOUND PRODUCED WHEN WALKING 1370 PRINT" WHEN YOU ARE DONE, PRESS FIRE":GOSUB530:F$="TUT 2":GOTO260 1390 PRINT"[153]";:PRINT"[144]YOU MAY MOVE UP & DOWN ON BLACK LADDERS":PRINT"IF THERE IS A LADDER ABOVE YOU, YOU MAY":PRINT" MOVE UP.":PRINT"IF THERE IS A LADDER BELOW YOU, YOU MAY":PRINT" MOVE DOWN.":PRINT"BE CAREFUL OF LADDERS THAT TAKE YOU UP, 1460 [153]" BUT WON'T TAKE YOU DOWN AND VISE-VERSA":[153]"PRESS FIRE WHEN YOU ARE DONE.":[141]530:F$[178]"TUT 3":[137]260 1500 [153]"PRINT";:[153]"PRINTSTOPYOU MAY MOVE ACROSS THE DARK GREEN":[153]" HAND-OVER-HAND BARS.":[153]"YOU MAY MOVE LEFT & RIGHT ON THEM":[153]:[153]"PRESS FIRE WHEN YOU ARE FINISHED.":[141]530:F$[178]"TUT 4":[137]260 1560 [153]"PRINT";:[153]"PRINTSTOPYOU MAY PASS THROUGH THE WHITE DOORS":[153]"ONCE THE DOOR HAS BEEN PASSED THROUGH":[153]" IT TURNS INTO AN IMPASSABLE WALL.":[153]:[153]"PRESS FIRE TO CONTINUE":[141]530:F$[178]"TUT 5":[137]260 1630 [153]"PRINT";:[153]"PRINTSTOPTRY JUMPING ONTO THE WAITB.":[153]"AS YOU MOVE UPWARDS, YOU MAY MOVE LEFT &";:[153]" RIGHT ONTO PLATFORMS AND SUCH.":[153]"EXPERIMENT WITH THE TRAMPOLINES":[153]:[153]"PRESS FIRE TO GO ON.":[141]530:F$[178]"TUT 6":[137]260 1710 [153]"PRINT";:[153]"PRINTSTOPTRY FALLING FROM THE HAND BARS.":[153]"NOTICE YOU CAN FALL LONG DISTANCES IF";:[153]" YOU LAND ON ANOTHER HAND BAR.":[153]:[153]"PRESS FIRE AFTER TESTING THIS OUT.":[141]530:F$[178]"TUT 7":[137]260 1770 [153]"PRINT";:[153]"PRINTSTOPNOW LET'S SEE WHAT HAPPENS WHEN YOU":[153]" DIE.":[153]"TRY JUMPING TO YOUR DEATH.":[153]"PRESS FIRE WHEN YOU ARE THROUGH DYING":[141]530 1820 [153]"LOADSTOP END OF TUTORIAL":[129]A[178]1[164]2000:[130]:[137]130 1860 [153]"LOAD STOPLOADING ALL SMILES...":[153]"PRINT#NEWCMDCMDCMD":[153]"LOAD"[199](34)"ALL SMILES GAME"[199](34)",8":[153]"RUN";:[151]198,5:[129]T[178]1[164]5:[151]630[170]T,13:[130]:[128]:[128] 1910 [139]ML[178]1[167]300 1920 [139]ML[178]2[167]310 1930 [139]ML[178]3[167]260 1940 [139]ML[178]8[167]110 1960 [139][194](12288)[178]60[167]110 1970 ML[178]8:[147]"PARTS",8,1:[129]I[178].[164]255:[129]J[178].[164]7:[161]#1,A$:[151]12288[170]J[170]I[172]8,[198](A$[170][199](.)):[130]:[130]:[160]2:[137]110 60000 [159]15,8,15,"R0:HELLO CONNECT=HELLO CONNECT":[132]15,ER:[160]15:[139]ER[179][177]63[167][128] 60020 [151]53272,21:[147]"HELLO CONNECT",8 60100 [151]53280,2:[151]53281,1:[153][199](142)"LOAD(null)TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANRIGHT$";:[129]A[178]1[164]23:[153]"(null)"[166]38)"(null)";:[130]:[153]"MID$TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN(null)CMDSAVETAN":[129]A[178]217[164]242:[151]A,[194](A)[176]128:[130]:[153]" POKELOADSTAR PRESENTS:":[153]"  60170 PRINT"  ALL SMILES [152] ":PRINT"  [152] ":PRINT"  BY RON COFFEN [152] ":PRINT"  [152] ":PRINT"  COPYRIGHT 1987 [152] ":PRINT"  [152] 60230 [153]" PRINT# ":[139][194](12288)[178]60[167][142] 60240 [153]"ON POKELOADING GRAPHICS -- PLEASE WAIT.":[142]